﻿Public Class ConexionExcepcion
    Inherits ExceptionManager

    Public Sub New(innerException As System.Exception)
        MyBase.New("No se pudo realizar la conexión a la base de datos")
        Me.codigo = Utils.Enumeradores.Excepeciones.ConexionBDFallida
        Me.tipo = MsgBoxStyle.Exclamation
        Me.mensaje = "No se pudo realizar la conexión a la base de datos"
        Me.innerException2 = innerException
    End Sub
End Class
